perm filename COMP.AL0[HAL,HE] blob sn#227524 filedate 1976-07-26 generic text, type T, neo UTF8
		;Start of program
	XPROG
		;BLOCK
	XMVAR
		;
	22
		;$B1.STAND
	24
		;$B1.D2
	26
		;$B1.D1
	30
	0
		;Assignment
	XPUSH
	L1
	XCHNGE
		;BARM
	14
		;Move
	XMOVE
	L2
	4
		;Assignment
	XPUSH
	L3
	XCHNGE
		;$B1.STAND
	24
		;Assignment
		;first argument
	XGTVAL
		;$B1.STAND
	24
		;second argument
	XPUSH
	L4
	XTMAKE
	XCHNGE
		;$B1.D2
	26
		;Assignment
		;first argument
	XGTVAL
		;$B1.STAND
	24
		;second argument
	XPUSH
	L5
	XTMAKE
	XCHNGE
		;$B1.D1
	30
		;Move
	XMOVE
	L6
	4
		;Block end cleanup
	XKVAR
		;
	22
		;$B1.STAND
	24
		;$B1.D2
	26
		;$B1.D1
	30
	0
		;End of BLOCK
	XENDP
		;End of program